/ BBS in a Box 5 / BBS in a Box -Volume V (BBS in a Box) (April 1992).iso / Files / Util / B / Beepshuffle.cpt / BeepShuffle.c

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0d 42 65 65 70 53 68 | 75 66 66 6c 65 2e 63 00 |..BeepSh|uffle.c.|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 01 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 0b 90 00 | 00 01 5c a1 d2 82 32 a1 |........|..\...2.|
|00000060| d2 82 32 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..2.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 f7 52 00 00 |........|.....R..|
|00000080| 2f 2a 20 42 65 65 70 53 | 68 75 66 66 6c 65 2e 63 |/* BeepS|huffle.c|
|00000090| 20 2a 2f 0d 2f 2a 09 42 | 65 65 70 53 68 75 66 66 | */./*.B|eepShuff|
|000000a0| 6c 65 20 a9 20 31 39 39 | 30 2c 20 62 79 20 41 6c |le . 199|0, by Al|
|000000b0| 65 78 20 43 68 61 66 66 | 65 65 0d 09 63 68 61 66 |ex Chaff|ee..chaf|
|000000c0| 66 65 65 40 72 65 65 64 | 2e 75 75 63 70 09 43 49 |fee@reed|.uucp.CI|
|000000d0| 53 3a 37 31 32 31 30 2c | 31 31 31 37 0d 09 52 65 |S:71210,|1117..Re|
|000000e0| 65 64 20 43 6f 6c 6c 65 | 67 65 20 42 6f 78 20 32 |ed Colle|ge Box 2|
|000000f0| 35 39 2c 20 50 6f 72 74 | 6c 61 6e 64 20 4f 52 20 |59, Port|land OR |
|00000100| 39 37 32 30 32 0d 0d 09 | 54 68 69 73 20 73 6f 75 |97202...|This sou|
|00000110| 72 63 65 20 6d 61 79 20 | 62 65 20 66 72 65 65 6c |rce may |be freel|
|00000120| 79 20 64 69 73 74 72 69 | 62 75 74 65 64 2e 0d 09 |y distri|buted...|
|00000130| 0d 09 56 65 72 73 69 6f | 6e 09 44 61 74 65 09 09 |..Versio|n.Date..|
|00000140| 48 69 73 74 6f 72 79 0d | 09 30 2e 31 09 09 37 2f |History.|.0.1..7/|
|00000150| 32 31 2f 38 39 09 56 65 | 72 73 69 6f 6e 20 31 0d |21/89.Ve|rsion 1.|
|00000160| 09 30 2e 32 09 09 31 2f | 39 2f 39 30 09 4c 65 67 |.0.2..1/|9/90.Leg|
|00000170| 61 6c 69 7a 65 64 20 74 | 61 69 6c 2d 70 61 74 63 |alized t|ail-patc|
|00000180| 68 0d 09 09 09 09 09 49 | 6d 70 6c 65 6d 65 6e 74 |h......I|mplement|
|00000190| 65 64 20 74 72 75 65 20 | 72 61 6e 64 6f 6d 6e 65 |ed true |randomne|
|000001a0| 73 73 20 28 75 73 69 6e | 67 20 54 69 63 6b 73 20 |ss (usin|g Ticks |
|000001b0| 69 6e 73 74 65 61 64 20 | 6f 66 20 52 61 6e 64 6f |instead |of Rando|
|000001c0| 6d 29 0d 0d 2f 2a 09 41 | 6e 20 49 4e 49 54 20 74 |m)../*.A|n INIT t|
|000001d0| 68 61 74 20 77 69 6c 6c | 20 70 61 74 63 68 20 53 |hat will| patch S|
|000001e0| 79 73 42 65 65 70 20 74 | 6f 20 73 65 6c 65 63 74 |ysBeep t|o select|
|000001f0| 0d 09 61 20 72 61 6e 64 | 6f 6d 20 62 65 65 70 20 |..a rand|om beep |
|00000200| 66 72 6f 6d 20 61 6c 6c | 20 69 6e 73 74 61 6c 6c |from all| install|
|00000210| 65 64 20 27 73 6e 64 20 | 27 73 2e 0d 09 43 75 73 |ed 'snd |'s...Cus|
|00000220| 74 6f 6d 20 48 65 61 64 | 65 72 73 3a 20 4f 4e 0d |tom Head|ers: ON.|
|00000230| 2a 2f 0d 0d 2f 2a 20 6c | 6f 77 2d 6d 65 6d 20 67 |*/../* l|ow-mem g|
|00000240| 6c 6f 62 61 6c 73 20 2a | 2f 0d 23 64 65 66 69 6e |lobals *|/.#defin|
|00000250| 65 09 53 59 53 42 45 45 | 50 09 30 78 41 39 43 38 |e.SYSBEE|P.0xA9C8|
|00000260| 09 09 09 09 2f 2a 20 53 | 79 73 42 65 65 70 20 54 |..../* S|ysBeep T|
|00000270| 72 61 70 23 20 2a 2f 0d | 23 64 65 66 69 6e 65 09 |rap# */.|#define.|
|00000280| 53 6e 64 50 6c 61 79 54 | 72 61 70 09 30 78 30 35 |SndPlayT|rap.0x05|
|00000290| 09 09 09 2f 2a 20 53 6e | 64 50 6c 61 79 20 54 72 |.../* Sn|dPlay Tr|
|000002a0| 61 70 23 20 2a 2f 0d 23 | 64 65 66 69 6e 65 09 55 |ap# */.#|define.U|
|000002b0| 6e 54 72 61 70 09 30 78 | 39 46 09 09 09 09 2f 2a |nTrap.0x|9F..../*|
|000002c0| 20 55 6e 69 6d 70 6c 65 | 6d 65 6e 74 65 64 20 54 | Unimple|mented T|
|000002d0| 72 61 70 20 23 20 2a 2f | 0d 0d 65 78 74 65 72 6e |rap # */|..extern|
|000002e0| 20 75 6e 73 69 67 6e 65 | 64 20 63 68 61 72 20 53 | unsigne|d char S|
|000002f0| 6f 75 6e 64 41 63 74 69 | 76 65 3a 20 30 78 30 32 |oundActi|ve: 0x02|
|00000300| 37 45 3b 09 2f 2a 20 49 | 73 20 61 6e 20 61 73 79 |7E;./* I|s an asy|
|00000310| 6e 63 20 73 6f 75 6e 64 | 20 61 6c 72 65 61 64 79 |nc sound| already|
|00000320| 20 70 6c 61 79 69 6e 67 | 3f 20 2a 2f 0d 65 78 74 | playing|? */.ext|
|00000330| 65 72 6e 20 75 6e 73 69 | 67 6e 65 64 20 63 68 61 |ern unsi|gned cha|
|00000340| 72 20 53 64 56 6f 6c 75 | 6d 65 3a 20 30 78 30 32 |r SdVolu|me: 0x02|
|00000350| 36 30 3b 09 09 2f 2a 20 | 76 6f 6c 75 6d 65 20 2a |60;../* |volume *|
|00000360| 2f 0d 0d 2f 2a 20 70 72 | 6f 67 72 61 6d 20 67 6c |/../* pr|ogram gl|
|00000370| 6f 62 61 6c 73 2f 63 6f | 6e 73 74 61 6e 74 73 20 |obals/co|nstants |
|00000380| 2a 2f 0d 23 64 65 66 69 | 6e 65 20 69 6e 74 5f 48 |*/.#defi|ne int_H|
|00000390| 49 42 49 54 4f 46 46 09 | 30 78 37 46 46 46 0d 73 |IBITOFF.|0x7FFF.s|
|000003a0| 74 61 74 69 63 20 6c 6f | 6e 67 20 4f 6c 64 53 79 |tatic lo|ng OldSy|
|000003b0| 73 42 65 65 70 3b 09 09 | 09 09 09 2f 2a 09 46 6f |sBeep;..|.../*.Fo|
|000003c0| 72 6d 65 72 20 53 79 73 | 42 65 65 70 20 74 72 61 |rmer Sys|Beep tra|
|000003d0| 70 20 61 64 64 72 65 73 | 73 09 2a 2f 0d 23 64 65 |p addres|s.*/.#de|
|000003e0| 66 69 6e 65 09 53 55 43 | 43 45 53 53 09 31 32 38 |fine.SUC|CESS.128|
|000003f0| 09 09 09 09 09 2f 2a 09 | 49 43 4e 23 20 63 6f 64 |...../*.|ICN# cod|
|00000400| 65 73 09 2a 2f 0d 23 64 | 65 66 69 6e 65 09 46 41 |es.*/.#d|efine.FA|
|00000410| 49 4c 09 09 31 32 39 0d | 0d 2f 2a 20 66 6f 72 77 |IL..129.|./* forw|
|00000420| 61 72 64 20 64 65 63 6c | 61 72 61 74 69 6f 6e 73 |ard decl|arations|
|00000430| 20 2a 2f 0d 65 78 74 65 | 72 6e 20 70 61 73 63 61 | */.exte|rn pasca|
|00000440| 6c 20 76 6f 69 64 20 6d | 79 53 79 73 42 65 65 70 |l void m|ySysBeep|
|00000450| 28 29 3b 0d 65 78 74 65 | 72 6e 20 6d 61 69 6e 28 |();.exte|rn main(|
|00000460| 29 3b 0d 70 61 73 63 61 | 6c 20 76 6f 69 64 20 53 |);.pasca|l void S|
|00000470| 68 6f 77 49 4e 49 54 28 | 73 68 6f 72 74 20 69 63 |howINIT(|short ic|
|00000480| 6f 6e 49 44 2c 20 73 68 | 6f 72 74 20 6d 6f 76 65 |onID, sh|ort move|
|00000490| 58 29 3b 0d 0d 6d 61 69 | 6e 28 29 0d 7b 0d 09 72 |X);..mai|n().{..r|
|000004a0| 65 67 69 73 74 65 72 20 | 48 61 6e 64 6c 65 20 48 |egister |Handle H|
|000004b0| 3b 0d 09 73 68 6f 72 74 | 09 74 68 65 49 63 6e 3b |;..short|.theIcn;|
|000004c0| 0d 09 0d 2f 2a 20 73 61 | 76 65 20 61 6c 6c 20 73 |.../* sa|ve all s|
|000004d0| 79 73 74 65 6d 20 72 65 | 67 69 73 74 65 72 73 20 |ystem re|gisters |
|000004e0| 2a 2f 0d 09 61 73 6d 20 | 7b 0d 09 09 6d 6f 76 65 |*/..asm |{...move|
|000004f0| 6d 2e 6c 09 61 31 2d 61 | 35 2f 64 30 2d 64 37 2c |m.l.a1-a|5/d0-d7,|
|00000500| 20 2d 28 53 50 29 0d 0d | 2f 2a 09 53 65 74 20 55 | -(SP)..|/*.Set U|
|00000510| 70 20 41 34 20 74 6f 20 | 70 6f 69 6e 74 20 74 6f |p A4 to |point to|
|00000520| 20 74 6f 70 20 6f 66 20 | 72 65 73 6f 75 72 63 65 | top of |resource|
|00000530| 20 74 6f 20 61 63 63 65 | 73 73 20 67 6c 6f 62 61 | to acce|ss globa|
|00000540| 6c 20 76 61 72 69 61 62 | 6c 65 73 09 2a 2f 0d 0d |l variab|les.*/..|
|00000550| 09 09 4c 45 41 09 6d 61 | 69 6e 2c 20 41 34 09 3b |..LEA.ma|in, A4.;|
|00000560| 20 70 75 74 20 74 6f 70 | 20 61 64 64 72 65 73 73 | put top| address|
|00000570| 20 69 6e 20 41 34 0d 0d | 2f 2a 09 53 65 6c 66 2d | in A4..|/*.Self-|
|00000580| 70 72 65 73 65 72 76 61 | 74 69 6f 6e 09 09 2a 2f |preserva|tion..*/|
|00000590| 0d 0d 09 09 4c 45 41 09 | 6d 61 69 6e 2c 20 41 30 |....LEA.|main, A0|
|000005a0| 09 3b 20 70 75 74 20 61 | 64 64 72 65 73 73 20 6f |.; put a|ddress o|
|000005b0| 66 20 72 65 73 6f 75 72 | 63 65 20 69 6e 20 70 61 |f resour|ce in pa|
|000005c0| 72 61 6d 65 74 65 72 0d | 09 09 5f 52 65 63 6f 76 |rameter.|.._Recov|
|000005d0| 65 72 48 61 6e 64 6c 65 | 0d 09 09 6d 6f 76 65 2e |erHandle|...move.|
|000005e0| 6c 09 61 30 2c 20 48 09 | 3b 20 77 68 6f 20 61 6d |l.a0, H.|; who am|
|000005f0| 20 69 3f 0d 09 7d 0d 09 | 48 4c 6f 63 6b 28 48 29 | i?..}..|HLock(H)|
|00000600| 3b 0d 09 44 65 74 61 63 | 68 52 65 73 6f 75 72 63 |;..Detac|hResourc|
|00000610| 65 28 48 29 3b 0d 0d 2f | 2a 09 43 68 65 63 6b 20 |e(H);../|*.Check |
|00000620| 66 6f 72 20 63 6f 6d 70 | 61 74 69 62 69 6c 69 74 |for comp|atibilit|
|00000630| 79 09 2a 2f 0d 0d 2f 2a | 09 63 68 65 63 6b 20 74 |y.*/../*|.check t|
|00000640| 6f 20 73 65 65 20 69 66 | 20 53 6e 64 50 6c 61 79 |o see if| SndPlay|
|00000650| 20 69 73 20 69 6d 70 6c | 65 6d 65 6e 74 65 64 20 | is impl|emented |
|00000660| 61 73 20 70 65 72 20 54 | 4e 23 31 35 36 2e 09 09 |as per T|N#156...|
|00000670| 2a 2f 0d 09 69 66 20 28 | 09 4e 47 65 74 54 72 61 |*/..if (|.NGetTra|
|00000680| 70 41 64 64 72 65 73 73 | 28 53 6e 64 50 6c 61 79 |pAddress|(SndPlay|
|00000690| 54 72 61 70 2c 20 54 6f | 6f 6c 54 72 61 70 29 20 |Trap, To|olTrap) |
|000006a0| 3d 3d 20 0d 09 09 4e 47 | 65 74 54 72 61 70 41 64 |== ...NG|etTrapAd|
|000006b0| 64 72 65 73 73 28 55 6e | 54 72 61 70 2c 20 54 6f |dress(Un|Trap, To|
|000006c0| 6f 6c 54 72 61 70 29 09 | 29 0d 09 7b 09 2f 2a 20 |olTrap).|)..{./* |
|000006d0| 66 61 69 6c 75 72 65 20 | 2a 2f 0d 09 09 74 68 65 |failure |*/...the|
|000006e0| 49 63 6e 20 3d 20 46 41 | 49 4c 3b 0d 09 7d 0d 0d |Icn = FA|IL;..}..|
|000006f0| 2f 2a 09 49 6e 73 74 61 | 6c 6c 20 6d 79 20 62 65 |/*.Insta|ll my be|
|00000700| 65 70 09 09 09 2a 2f 0d | 09 65 6c 73 65 20 69 66 |ep...*/.|.else if|
|00000710| 20 28 42 75 74 74 6f 6e | 28 29 29 09 09 09 09 09 | (Button|()).....|
|00000720| 09 2f 2a 09 53 74 61 72 | 74 75 70 20 63 6c 69 63 |./*.Star|tup clic|
|00000730| 6b 20 2d 3e 20 46 61 69 | 6c 75 72 65 09 2a 2f 0d |k -> Fai|lure.*/.|
|00000740| 09 09 74 68 65 49 63 6e | 20 3d 20 46 41 49 4c 3b |..theIcn| = FAIL;|
|00000750| 0d 09 65 6c 73 65 20 7b | 0d 09 09 4f 6c 64 53 79 |..else {|...OldSy|
|00000760| 73 42 65 65 70 20 3d 20 | 47 65 74 54 72 61 70 41 |sBeep = |GetTrapA|
|00000770| 64 64 72 65 73 73 28 53 | 59 53 42 45 45 50 29 3b |ddress(S|YSBEEP);|
|00000780| 0d 09 09 53 65 74 54 72 | 61 70 41 64 64 72 65 73 |...SetTr|apAddres|
|00000790| 73 28 26 6d 79 53 79 73 | 42 65 65 70 2c 20 53 59 |s(&mySys|Beep, SY|
|000007a0| 53 42 45 45 50 29 3b 0d | 09 09 74 68 65 49 63 6e |SBEEP);.|..theIcn|
|000007b0| 20 3d 20 53 55 43 43 45 | 53 53 3b 0d 09 7d 0d 09 | = SUCCE|SS;..}..|
|000007c0| 53 68 6f 77 49 4e 49 54 | 28 74 68 65 49 63 6e 2c |ShowINIT|(theIcn,|
|000007d0| 20 2d 31 29 3b 0d 0d 09 | 61 73 6d 20 7b 0d 09 09 | -1);...|asm {...|
|000007e0| 6d 6f 76 65 6d 2e 6c 09 | 28 53 50 29 2b 2c 20 61 |movem.l.|(SP)+, a|
|000007f0| 31 2d 61 35 2f 64 30 2d | 64 37 09 09 3b 20 72 65 |1-a5/d0-|d7..; re|
|00000800| 73 74 6f 72 65 20 72 65 | 67 69 73 74 65 72 73 0d |store re|gisters.|
|00000810| 09 7d 0d 7d 0d 0d 70 61 | 73 63 61 6c 20 76 6f 69 |.}.}..pa|scal voi|
|00000820| 64 20 6d 79 53 79 73 42 | 65 65 70 28 64 75 72 61 |d mySysB|eep(dura|
|00000830| 74 69 6f 6e 29 0d 69 6e | 74 20 64 75 72 61 74 69 |tion).in|t durati|
|00000840| 6f 6e 3b 0d 7b 0d 09 72 | 65 67 69 73 74 65 72 20 |on;.{..r|egister |
|00000850| 69 6e 74 20 74 6f 74 61 | 6c 3b 0d 09 72 65 67 69 |int tota|l;..regi|
|00000860| 73 74 65 72 20 69 6e 74 | 20 69 3b 0d 09 72 65 67 |ster int| i;..reg|
|00000870| 69 73 74 65 72 20 48 61 | 6e 64 6c 65 20 48 3b 0d |ister Ha|ndle H;.|
|00000880| 09 0d 09 2f 2a 20 73 69 | 6e 63 65 20 74 68 69 73 |.../* si|nce this|
|00000890| 20 69 73 20 61 20 74 72 | 61 70 20 72 6f 75 74 69 | is a tr|ap routi|
|000008a0| 6e 65 2c 20 77 65 20 6d | 75 73 74 20 70 72 65 73 |ne, we m|ust pres|
|000008b0| 65 72 76 65 20 74 68 65 | 20 72 65 67 69 73 74 65 |erve the| registe|
|000008c0| 72 73 20 2a 2f 0d 09 61 | 73 6d 20 7b 0d 09 09 6d |rs */..a|sm {...m|
|000008d0| 6f 76 65 6d 2e 6c 09 61 | 31 2d 61 35 2f 64 30 2d |ovem.l.a|1-a5/d0-|
|000008e0| 64 37 2c 20 2d 28 53 50 | 29 09 3b 20 61 36 20 69 |d7, -(SP|).; a6 i|
|000008f0| 73 20 6c 75 6e 6b 2c 20 | 61 37 20 69 73 20 53 50 |s lunk, |a7 is SP|
|00000900| 0d 09 2f 2a 20 73 65 74 | 20 75 70 20 67 6c 6f 62 |../* set| up glob|
|00000910| 61 6c 73 20 2a 2f 0d 09 | 09 4c 45 41 20 6d 61 69 |als */..|.LEA mai|
|00000920| 6e 2c 20 41 34 09 09 09 | 09 3b 20 73 65 74 20 75 |n, A4...|.; set u|
|00000930| 70 20 67 6c 6f 62 61 6c | 73 0d 09 7d 0d 0d 09 69 |p global|s..}...i|
|00000940| 66 20 28 21 53 6f 75 6e | 64 41 63 74 69 76 65 20 |f (!Soun|dActive |
|00000950| 26 26 20 53 64 56 6f 6c | 75 6d 65 29 09 0d 09 7b |&& SdVol|ume)...{|
|00000960| 09 2f 2a 20 46 69 6e 64 | 20 73 6e 64 20 2a 2f 0d |./* Find| snd */.|
|00000970| 09 09 74 6f 74 61 6c 20 | 3d 20 43 6f 75 6e 74 52 |..total |= CountR|
|00000980| 65 73 6f 75 72 63 65 73 | 28 27 73 6e 64 20 27 29 |esources|('snd ')|
|00000990| 3b 0d 09 09 69 66 20 28 | 74 6f 74 61 6c 29 0d 09 |;...if (|total)..|
|000009a0| 09 7b 0d 09 09 09 69 20 | 3d 20 28 28 69 6e 74 29 |.{....i |= ((int)|
|000009b0| 54 69 63 6b 73 20 26 20 | 69 6e 74 5f 48 49 42 49 |Ticks & |int_HIBI|
|000009c0| 54 4f 46 46 29 20 25 20 | 74 6f 74 61 6c 20 2b 20 |TOFF) % |total + |
|000009d0| 31 3b 09 2f 2a 20 6e 6f | 6e 2d 6e 65 67 2e 2c 20 |1;./* no|n-neg., |
|000009e0| 31 20 2d 3e 20 74 6f 74 | 61 6c 20 2a 2f 0d 09 09 |1 -> tot|al */...|
|000009f0| 09 48 20 3d 20 47 65 74 | 49 6e 64 52 65 73 6f 75 |.H = Get|IndResou|
|00000a00| 72 63 65 28 27 73 6e 64 | 20 27 2c 20 69 29 3b 0d |rce('snd| ', i);.|
|00000a10| 09 09 09 53 6e 64 50 6c | 61 79 28 30 4c 2c 20 48 |...SndPl|ay(0L, H|
|00000a20| 2c 20 46 41 4c 53 45 29 | 3b 09 09 09 09 2f 2a 20 |, FALSE)|;..../* |
|00000a30| 73 68 6f 75 6c 64 20 49 | 20 65 72 72 6f 72 2d 63 |should I| error-c|
|00000a40| 68 65 63 6b 3f 20 20 4e | 61 68 c9 09 2a 2f 0d 09 |heck?  N|ah..*/..|
|00000a50| 09 09 61 73 6d 20 7b 09 | 09 09 09 09 09 2f 2a 09 |..asm {.|...../*.|
|00000a60| 72 65 74 75 72 6e 20 4e | 4f 57 21 09 2a 2f 0d 09 |return N|OW!.*/..|
|00000a70| 09 09 09 6d 6f 76 65 6d | 2e 6c 09 28 53 50 29 2b |...movem|.l.(SP)+|
|00000a80| 2c 20 61 31 2d 61 35 2f | 64 30 2d 64 37 09 09 3b |, a1-a5/|d0-d7..;|
|00000a90| 20 72 65 73 74 6f 72 65 | 20 72 65 67 69 73 74 65 | restore| registe|
|00000aa0| 72 73 0d 09 09 09 09 55 | 4e 4c 4b 09 09 41 36 09 |rs.....U|NLK..A6.|
|00000ab0| 09 09 09 09 3b 20 72 65 | 6d 6f 76 65 20 73 74 61 |....; re|move sta|
|00000ac0| 63 6b 20 66 72 61 6d 65 | 0d 09 09 09 09 6d 6f 76 |ck frame|.....mov|
|00000ad0| 65 61 2e 6c 09 28 53 50 | 29 2b 2c 20 41 30 09 09 |ea.l.(SP|)+, A0..|
|00000ae0| 09 09 3b 20 67 65 74 20 | 72 65 74 75 72 6e 20 61 |..; get |return a|
|00000af0| 64 64 72 0d 09 09 09 09 | 61 64 64 71 2e 77 09 23 |ddr.....|addq.w.#|
|00000b00| 32 2c 20 53 50 09 09 09 | 09 3b 20 70 6f 70 20 70 |2, SP...|.; pop p|
|00000b10| 61 72 61 6d 65 74 65 72 | 0d 09 09 09 09 4a 4d 50 |arameter|.....JMP|
|00000b20| 09 09 28 41 30 29 09 09 | 09 09 09 3b 20 72 65 74 |..(A0)..|...; ret|
|00000b30| 75 72 6e 0d 09 09 09 7d | 0d 09 09 7d 0d 09 7d 0d |urn....}|...}..}.|
|00000b40| 09 61 73 6d 20 7b 09 09 | 09 09 09 09 2f 2a 20 65 |.asm {..|..../* e|
|00000b50| 6c 73 65 20 6c 65 67 61 | 6c 6c 79 20 6a 75 6d 70 |lse lega|lly jump|
|00000b60| 20 74 6f 20 72 65 61 6c | 20 53 79 73 42 65 65 70 | to real| SysBeep|
|00000b70| 09 2a 2f 0d 09 09 6d 6f | 76 65 61 2e 6c 09 4f 6c |.*/...mo|vea.l.Ol|
|00000b80| 64 53 79 73 42 65 65 70 | 2c 20 41 30 09 09 3b 20 |dSysBeep|, A0..; |
|00000b90| 67 65 74 20 6a 75 6d 70 | 20 61 64 64 72 0d 09 09 |get jump| addr...|
|00000ba0| 6d 6f 76 65 6d 2e 6c 09 | 28 53 50 29 2b 2c 20 61 |movem.l.|(SP)+, a|
|00000bb0| 31 2d 61 35 2f 64 30 2d | 64 37 09 09 3b 20 72 65 |1-a5/d0-|d7..; re|
|00000bc0| 73 74 6f 72 65 20 72 65 | 67 69 73 74 65 72 73 0d |store re|gisters.|
|00000bd0| 09 09 55 4e 4c 4b 09 09 | 41 36 09 09 09 09 09 3b |..UNLK..|A6.....;|
|00000be0| 20 72 65 6d 6f 76 65 20 | 73 74 61 63 6b 20 66 72 | remove |stack fr|
|00000bf0| 61 6d 65 0d 09 09 4a 4d | 50 09 09 28 41 30 29 09 |ame...JM|P..(A0).|
|00000c00| 09 09 09 09 3b 20 6a 75 | 6d 70 0d 09 7d 0d 7d 0d |....; ju|mp..}.}.|
|00000c10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c80| 00 00 01 00 00 00 01 16 | 00 00 00 16 00 00 00 46 |........|.......F|
|00000c90| 00 01 80 00 00 01 87 ff | ff e1 86 ff ff 61 87 ef |........|.....a..|
|00000ca0| ff e1 87 bf 7f e1 87 ff | fd e1 85 ef ff e1 87 ff |........|........|
|00000cb0| 0d 42 65 65 70 53 68 75 | 66 66 6c 65 2e 63 02 00 |.BeepShu|ffle.c..|
|00000cc0| 00 00 54 45 58 54 4b 41 | 48 4c 00 00 00 00 00 00 |..TEXTKA|HL......|
|00000cd0| 00 00 54 45 58 54 4b 41 | 48 4c 00 00 00 00 00 00 |..TEXTKA|HL......|
|00000ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cf0| 00 00 a1 d2 49 e4 00 00 | 0b 90 00 00 01 5c ff ff |....I...|.....\..|
|00000d00| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d10| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d20| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d50| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d60| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d70| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000d80| 00 00 00 04 00 06 00 04 | 00 00 00 0a 00 09 06 47 |........|.......G|
|00000d90| 65 6e 65 76 61 72 00 00 | 01 00 00 00 01 16 00 00 |enevar..|........|
|00000da0| 00 16 00 00 00 46 00 15 | 32 42 04 0c 00 00 00 1c |.....F..|2B......|
|00000db0| 00 46 00 01 45 54 41 42 | 00 00 00 12 45 46 4e 54 |.F..ETAB|....EFNT|
|00000dc0| 00 00 00 1e 03 ec ff ff | 00 00 00 00 00 15 32 1a |........|......2.|
|00000dd0| 03 eb ff ff 00 00 00 08 | 00 15 31 7a 00 00 00 00 |........|..1z....|
|00000de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+